home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 23 / AACD 23.iso / AACD / Games / GeneticSpecies / Install < prev    next >
Text File  |  2001-06-27  |  583b  |  23 lines
  1. (set InstallPath
  2.     (askdir
  3.         (prompt 'Where would you like Genetic Species installed?\nA drawer called "Genetics" will be created.')
  4.         (help @askdir-help)
  5.         (default 'Work:')
  6.         (disk)
  7.     )
  8. )
  9.  
  10. (if (not (exists 'L:lzx.keyfile'))
  11.     (run 'copy lzx.keyfile L: clone')
  12. )
  13.  
  14. (message '\nGenetic Species will now be installed to ' InstallPath '\n\nThis may take some time')
  15. (working 'Unpacking Genetic Species, please be patient')
  16. (if (run (cat 'LZX -q x GeneticSpecies.lzx ' (tackon InstallPath '')))
  17.     (message '\nUnpacking failed')
  18. )
  19. (set @default-dest (tackon InstallPath 'Genetics'))
  20.  
  21. (exit)
  22.  
  23.